VecValueTemp=[89 91 94 95 99 101 102 103 104 83 85 86 305 307 308 310 311 312];
for n1=1:size(VecValueTemp,2)
%     FilterFourthLevelEditorsCoAuthors(VecValueTemp(1,n1));
    FilterFourthLevelEditorsCoAuthors2(VecValueTemp(1,n1));
end